home *** CD-ROM | disk | FTP | other *** search
/ CIRCUS / CIRCUS.iso / circus.mac / circus.dxr / 00047_ENTER -- Main Screen.ls < prev    next >
Encoding:
Text File  |  1996-08-05  |  428 b   |  17 lines
  1. on exitFrame
  2.   birth(script "MovieSpriteClass")
  3.   birth(script "RolloverSpriteClass")
  4.   birth(script "RolloverSpriteClass")
  5.   birth(script "RolloverSpriteClass")
  6.   birth(script "RolloverSpriteClass")
  7.   birth(script "RolloverSpriteClass")
  8.   birth(script "RolloverSpriteClass")
  9.   set the volume of sound 1 to 255
  10.   set the volume of sound 2 to 200
  11.   if getScore() < 50 then
  12.     videoWelcome()
  13.   else
  14.     videoDance()
  15.   end if
  16. end
  17.